home *** CD-ROM | disk | FTP | other *** search
/ Exploring Where & Why / Exploring Where & Why.iso / pc / MEMMON.DIR / 00023_Preload.ls < prev    next >
Encoding:
Text File  |  2003-04-21  |  439 b   |  24 lines
  1. on mouseUp
  2.   global gTemp
  3.   tell the stage
  4.     cursor(0)
  5.   end tell
  6.   tell the stage
  7.     cursor(4)
  8.   end tell
  9.   freebytesAtStart = the freeBytes
  10.   tell the stage
  11.     gTemp = the number of castMembers
  12.   end tell
  13.   total = GetStageCastSizes(1, gTemp, 0)
  14.   now = startTimer()
  15.   tell the stage
  16.     preload()
  17.   end tell
  18.   duration = PutTime(now)
  19.   Throughput(duration, total, 0, freebytesAtStart)
  20.   tell the stage
  21.     cursor(-1)
  22.   end tell
  23. end
  24.